home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi Informant Complete 1995 - 2000
/
Delphi Informant Complete 1995 to 2000.iso
/
Delphi Informant Magazine Complete Works SOURCE CODE 1998.rar
/
1998
/
Nov
/
di9811gd
/
Example2
/
Unit2.dfm
/
Unit2.txt
Wrap
Text File
|
1998-01-02
|
2KB
|
105 lines
object Form1: TForm1
Left = 208
Top = 133
Width = 265
Height = 245
Caption = 'Example 2b'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 4
Top = 2
Width = 100
Height = 13
Caption = 'Instantiated Threads:'
end
object Label2: TLabel
Left = 4
Top = 176
Width = 24
Height = 13
Caption = 'Text:'
end
object btnLoad: TButton
Left = 132
Top = 18
Width = 120
Height = 25
Caption = '&Load library'
TabOrder = 0
OnClick = btnLoadClick
end
object btnUnload: TButton
Left = 132
Top = 46
Width = 120
Height = 25
Caption = '&Unload library'
TabOrder = 1
OnClick = btnUnloadClick
end
object lbThreads: TListBox
Left = 4
Top = 18
Width = 121
Height = 129
ItemHeight = 13
TabOrder = 4
end
object btnNewThread: TButton
Left = 132
Top = 94
Width = 120
Height = 25
Caption = 'Create &new thread'
TabOrder = 2
OnClick = btnNewThreadClick
end
object btnCloseThread: TButton
Left = 132
Top = 122
Width = 120
Height = 25
Caption = '&Close selected thread'
TabOrder = 3
OnClick = btnCloseThreadClick
end
object Edit1: TEdit
Left = 36
Top = 172
Width = 133
Height = 21
Enabled = False
TabOrder = 5
Text = 'hello world testing 3 2 1'
end
object btnGetFirstWord: TButton
Left = 176
Top = 160
Width = 75
Height = 25
Caption = 'Get &first word'
Enabled = False
TabOrder = 6
OnClick = btnGetFirstWordClick
end
object btnGetNextWord: TButton
Left = 176
Top = 188
Width = 75
Height = 25
Caption = 'Get &next word'
Enabled = False
TabOrder = 7
OnClick = btnGetNextWordClick
end
end